<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<!--#include virtual="/fundacaologosofica/include/cabecalho.asp"-->
<!--#include virtual="/fundacaologosofica/registro-docente/include/funcao.asp"-->
<%
set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.ActiveConnection = Conn
Rs.CursorType = 3
relatorio=1
Menu = 2
SubMenu = 5

Rs.Open "SELECT sede = CASE unidades.id_tipo WHEN 1 THEN 'Filial - ' WHEN 4 THEN 'Centro de Estudos - ' WHEN 9 THEN 'CDIL Formado - ' WHEN 5 THEN 'CDIL em Formação - ' WHEN 3 THEN 'Residente - ' END , * FROM unidades WHERE id_unidade = " & session("usr_fundacaol_unidade_docente")

if Rs.EOF or Rs.BOF then Response.Redirect "../dados/index.asp"
    
set Rs2 = Server.CreateObject("ADODB.RecordSet")
Rs2.ActiveConnection = Conn
Rs2.CursorType = 3

if Request("Ano") = "" or instr(1,Request("Ano"),",") <> 0 or not isnumeric(Request("Ano")) then  
    Response.Redirect "ano.asp"
else
    Rs2.Open "SELECT Ano FROM AnoRegistroDocente WHERE CodigoUnidade = " & session("usr_fundacaol_unidade_docente") & " AND Ano = " & Request("Ano")

    if Rs2.EOF or Rs2.BOF then Response.Redirect "ano.asp"

    Ano = Rs2(0)

    Rs2.Close
end if


if Request("CodigoComponente") <> "" and instr(1,Request("CodigoComponente"),",") = 0 and isnumeric(Request("CodigoComponente")) then
    Rs2.Open "SELECT * FROM filiados WHERE id_fil = " & Request("CodigoComponente") & " AND id_unidade = " & session("usr_fundacaol_unidade_docente")
    if Rs2.EOF or Rs2.BOF then
        Response.Redirect "ano.asp"
    end if

    Nome = Rs2("nome")

    Rs2.Close
end if

CodigoVolta = Request("Codigo")
CodigoComponente = Request("CodigoComponente")
Menor = Request("Menor")

if IsDate(Request("DataInicio")) then
    DataInicio = "{d '" & mid(Request("DataInicio"),7,4) &"-"& mid(Request("DataInicio"),4,2) &"-"& mid(Request("DataInicio"),1,2) & "' } "
else
    DataInicio = ""
end if

if IsDate(Request("DataFim")) then
    DataFim = "{d '" & mid(Request("DataFim"),7,4) &"-"& mid(Request("DataFim"),4,2) &"-"& mid(Request("DataFim"),1,2) & "' } "
else
    DataFim = ""
end if

if Request("CodigoConjunto") <> "" and instr(1,Request("CodigoConjunto"),",") = 0 and isnumeric(Request("CodigoConjunto")) then
    Rs2.Open "SELECT Conjunto.* , TipoConjunto.Descricao AS NomeTipoConjunto FROM Conjunto INNER JOIN TipoConjunto ON TipoConjunto.Codigo = Conjunto.CodigoTipoConjunto WHERE Conjunto.Codigo = " & Request("CodigoConjunto") & " AND Ano = " & Request("Ano") & " AND CodigoUnidade = " & session("usr_fundacaol_unidade_docente")
    if Rs2.EOF or Rs2.BOF then
        Response.Redirect "ano.asp"
    end if
    CodigoConjunto = Request("CodigoConjunto")
    NomeConjunto = Rs2("Nome")
    CodigoVolta = Rs2("CodigoConjuntoPai")
    CodigoTipoConjunto = Rs2("CodigoTipoConjunto")
    ControlarFrequencia = Rs2("ControlarFrequencia")
    FlagReuniaoGeral = Rs2("FlagReuniaoGeral")

    Rs2.Close
end if

 query_filtro_Ca="select unidades.id_unidade,unidades.descricao,"&_
		" sede = CASE unidades.id_tipo WHEN 1 THEN 'Filial - ' WHEN 4 THEN 'Centro de Estudos - ' WHEN 9 THEN"&_
		" 'CDIL Formado - ' WHEN 5 THEN 'CDIL em Formação - ' WHEN 3 THEN 'Residente - ' END"&_ 
		" from administrador_unidade"&_ 
        " inner join filiados on filiados.id_fil=administrador_unidade.id_fil"&_
        " inner join unidades on administrador_unidade.id_unidade= unidades.id_unidade"&_
		" inner join tipos on tipos.id_tipo=unidades.id_tipo"&_
        " where administrador_unidade.id_fil="&session("usr_fundacaol_seq")&"and 1<("&_
		" select COUNT(unidades.id_unidade) AS QTD from administrador_unidade"&_
		" inner join filiados on filiados.id_fil=administrador_unidade.id_fil"&_
		" inner join unidades on administrador_unidade.id_unidade= unidades.id_unidade"&_
		" where  administrador_unidade.id_fil="&session("usr_fundacaol_seq")&") order by ordem, descricao"
		set Objrsfiltro_Ca= Conn.execute(query_filtro_Ca)

if request("Tipoacao")="" then
	tipoacao="TemaNucleo"
else
	tipoacao=request("Tipoacao")
end if

SQL1=" select filiados.nome, COUNT(*) as qtd,"
SQL1=SQL1&" sum(cast(replace(replace(replace(replace(isnull(Frequencia.presente,0),'Atividade Logosófica',0),'Presente',1),'Ausente',0),'Justificado(a)',0)as int)) as Compareceu," 
SQL1=SQL1&" sum(cast(replace(replace(replace(replace(isnull(Frequencia.presente,0),'Atividade Logosófica',0),'Presente',0),'Ausente',1),'Justificado(a)',1)as int)) as faltou," 
SQL1=SQL1&" sum(cast(replace(replace(replace(replace(isnull(Frequencia.presente,0),'Atividade Logosófica',0 ),'Presente',0),'Ausente',0),'Justificado(a)',1)as int)) as Justificado"
SQL1=SQL1&" from filiados"
SQL1=SQL1&" inner join Frequencia on Frequencia.CodigoFiliado=filiados.id_fil"
SQL1=SQL1&" inner join Conjunto on Frequencia.CodigoConjunto=Conjunto.Codigo"
SQL1=SQL1&" where filiados.id_unidade="&session("usr_fundacaol_unidade_docente")
SQL1=SQL1&"and Frequencia.Presente not in ('Atividade Logosófica')"
SQL1=SQL1&" and tabela in('"&tipoacao&"')"
SQL1=SQL1&" and Ano =("&request("ano")&")"
if request("cargo")<>"" then
	SQL1=SQL1&" and CodigoCargo in("&request("cargo")&")"
end if

if request("ComposicaoFilhos")="" then
	if request("Composicao")<>"" then
		SQL1=SQL1&" and( Frequencia.CodigoConjunto in("&request("Composicao")&")"
		SQL1=SQL1&" or Conjunto.CodigoConjuntoPai in("&request("Composicao")&"))"		
	end if
else
	if request("Composicao")<>"" then
		SQL1=SQL1&" and Frequencia.CodigoConjunto in("&request("Composicao")&")"
		SQL1=SQL1&" and Conjunto.Codigo in("&request("ComposicaoFilhos")&")"		
	end if

end if

if isdate(request("DataInicio")) and isdate(request("DataFim")) then
 SQL1=SQL1&" and DataRegistro between CONVERT(smalldatetime,'"&request("DataInicio")&" 00:00:00',103)"
 SQL1=SQL1&" and CONVERT(smalldatetime,'"&request("DataFim")&" 23:59:59',103)"
end if


SQL1=SQL1&" group by filiados.nome order by filiados.nome"

%>



<html xmlns="http://www.w3.org/1999/xhtml">
<head>


<title>Funda&ccedil;&atilde;o Logos&oacute;fica</title>

</head>

<body>
   <!--#include virtual="/fundacaologosofica/include/superior.asp"-->
    <!--#include virtual="/fundacaologosofica/include/barra_botoes.asp"-->
    <!--#include virtual="/fundacaologosofica/registro-docente/include/head.asp"-->
    <div class="todo_site">
        <!--#include virtual="/fundacaologosofica/registro-docente/include/carregando.asp"-->
        <!--#include virtual="/fundacaologosofica/registro-docente/include/enviando.asp"-->
        <div class="conteudo_novo">
            <h2>Registro Docente</h2>
            <h3>Seja bem-vindo ao registro docente.</h3>
            <!--#include virtual="/fundacaologosofica/registro-docente/include/pesquisa.asp"-->
            <div class="abas_internas">
                <ul>
                    <!--#include virtual="/fundacaologosofica/registro-docente/include/menu.asp"-->
                </ul>
            </div>
            <div class="nova_interna">
                <!--#include virtual="/fundacaologosofica/registro-docente/include/sede.asp"-->
                <!--#include virtual="/fundacaologosofica/registro-docente/include/sub_menu.asp"-->
               
                <div class="cont2">
 
                        <script src="../include/jquery.printElement.js" type="text/javascript"></script>
                        <!--                        
                        <script type="text/javascript" src="../include/jquery.click-calendario-1.0-min.js"></script>
                        <link href="../include/jquery.click-calendario-1.0.css" rel="stylesheet" type="text/css"/>-->
                        	
                        <script>
							 $(document).ready(function(){						
								/*$('#1').click(function(){
									$(this).calendario({
										target:'#data_1'
										});
								});
									
								$('#2').click(function(){
									$(this).calendario({
										target:'#data_2',
										minDate:$('#data_1').val(),
										});
								});			*/						
									 
								$('#elementos_impressao').click(function(){								
									$('#ImprirAqui').printElement({pageTitle:'Relatorios.asp'});
								});
							});
						</script>
                    <div class="botao_gerenciar3">
                         <a target="_blank" title="Imprimir" id="elementos_impressao">
                            Imprimir
                        </a>
                    </div>
                
                    <div class="selo" id="selo">Relat&oacute;rio</div>
                    <div id="sucesso" class="fechar_sucesso" style="display: none;"><span id="msg_sucesso"></span><a id="fechar_sucesso"><img src="/fundacaologosofica/figuras/cross.png" /></a></div>
                    <div>                        
                        <div id="lista">
                        <div class="titulo">Relat&oacute;rios 
							<%if request("Tipoacao") ="TemaNucleo" then
                                Response.Write("Reuni&atilde;o")
                             else 
                                Response.Write(request("Tipoacao")) 
                             end if
							 Response.Write(" - "&request("ano"))
							 
							 %>
                             <b class="til">
                             <%
							 Response.Write(Request("nome_unidade"))
							 %>
                             </b>
                         </div>
                        <br />
                    <div class="relatorios">
                    <form  action="relatorio.asp" method="get" name="relatoriobusca">
                    <input type="hidden" name="Ano" id="Ano" value="<%= Request("Ano") %>" />
                     <input type="hidden" name="nome_unidade" id="nome_unidade" value="" />
<!--                    <input type="hidden" name="CodigoComponente" id="CodigoComponente" value="<%'= Request("CodigoComponente") %>" />
                    <input type="hidden" name="CodigoConjunto" id="CodigoConjunto" value="<%'= Request("CodigoConjunto") %>" />-->
                        
<!--                         <label class="total" style="padding: 0px 0px 0px 5px;">
                            <strong>Por período:&nbsp;&nbsp;&nbsp;</strong><br>
                            <input type="text"  name="DataInicio" id="data_1"  size="10" maxlength="10" style="font-family: 'Lucida Grande', 'Microsoft Sans Serif', 'Lucida Sans Unicode', Helvetica,  Arial, 'Sans-Serif',monospace; display:inline !important;" value="<%= Request("DataInicio") %>" /><img src="/fundacaologosofica/figuras/cal.gif" id="1" style="padding:0px 0px 0px 3px;cursor:pointer;" />
                           &nbsp; &nbsp;a&nbsp; &nbsp;
                            <input type="text" name="DataFim" id="data_2"  size="10" maxlength="10" style="font-family: 'Lucida Grande', 'Microsoft Sans Serif', 'Lucida Sans Unicode', Helvetica,  Arial, 'Sans-Serif',monospace; display:inline !important;" value="<%= Request("DataFim") %>" /><img src="/fundacaologosofica/figuras/cal.gif" id="2" style="padding:0px 0px 0px 3px; cursor:pointer;" />
                        </label>-->
                        
                        
                        <label class="total">
                            Por per&iacute;odo:<BR>
                            <input name="DataInicio" id="DataInicio" maxlength="10" style="font-family: 'Lucida Grande', 'Microsoft Sans Serif', 'Lucida Sans Unicode', Helvetica,  Arial, 'Sans-Serif',monospace; display:inline !important;" onKeyDown="return DataInicio.mask(event);" onBlur="if (this.value.length >= 11) this.value = this.value.substring(0,10)" type="text" onKeyPress="AtivaEnterRelatorio(event,'relatorio-frequencia');" value="<%= Request("DataInicio") %>" />
                            &nbsp;a&nbsp;
                            <input name="DataFim" id="DataFim" maxlength="10" style="font-family: 'Lucida Grande', 'Microsoft Sans Serif', 'Lucida Sans Unicode', Helvetica,  Arial, 'Sans-Serif',monospace; display:inline !important;" onKeyDown="return DataFim.mask(event);" onBlur="if (this.value.length >= 11) this.value = this.value.substring(0,10)" type="text" onKeyPress="AtivaEnterRelatorio(event,'relatorio-frequencia');" value="<%= Request("DataFim") %>" />
                        </label>
                        
                        
                        
                           <div style="padding: 0px 0px 10px 5px;"><strong>Por Tipo:</strong><br>
                            <select name="Tipoacao" id="Tipoacao">
                            	  <option value="" selected="selected">Selecionar - Tipo</option>                             
                                <%
								if request("Tipoacao")="TemaNucleo" then
									Tabela="Reuni&atilde;o"
								else
									Tabela=request("Tipoacao")
								end if
                                SqlConjunto="select distinct tabela from Frequencia"							
                                set Obj=Conn.execute(SqlConjunto)
                                select case Obj.eof
                                case Obj.bof<>Obj.eof
                                    while not Obj.eof
			'							if trim(Obj("tabela"))= trim(request("Tipoacao")) then
'											Selecionando=Selecionando&"<option selected=selected value="&Obj("tabela")&">"
'											if Obj("tabela")="TemaNucleo" then 
												'Tabela="Reuni&atilde;o"
'												Selecionando=Selecionando&"Reuni&atilde;o" 
'											else 
'												Selecionando=Selecionando&Obj("tabela")
'												Tabela=Obj("tabela")												 
'											end if
'											Selecionando=Selecionando&"</option>"
'											
'										else
											Selecionando=Selecionando&"<option value="&Obj("tabela")&">"
											if Obj("tabela")="TemaNucleo" then 
												'Tabela="Reuni&atilde;o"
												Selecionando=Selecionando&"Reuni&atilde;o" 
											else
												'Tabela=Obj("tabela")												
												Selecionando=Selecionando&Obj("tabela")												 
											end if
											Selecionando=Selecionando&"</option>"
										'end if										
                                       
                                        Obj.movenext
                                    wend
                                end select
                                 Response.Write(Selecionando)
                                %>
                            </select>    
                       </div> <br>
                       
                       
                        <div style="padding: 5px 0px 10px 5px;"><strong>Tipo Atividade</strong><br>
                            
                            <select name="Cargo" id="cargo"> 
                            	<option selected=selected value="">Selecione - Atividade</option>
                            	                               
                                <%
									Selecionando=""
								'if 	trim(request("Cargo"))="" then
									'Response.Write("<option selected=selected value=''>Selecione</option>")
								'else
									'Response.Write("<option value=''>Selecione</option>")
								'end if							
								
								query_filtro="select distinct(CodigoCargo), descricao,ordem"&_
								" from  cargos"&_
								" inner join  Frequencia on cargos.id_cargo=Frequencia.CodigoCargo"&_
								" where CodigoCargo  not in(28)"&_
								" order by ordem, CodigoCargo"
								
                                set Obj=Conn.execute(query_filtro)
                                select case Obj.eof
                                case Obj.bof<>Obj.eof
                                    while not Obj.eof
										'if trim(Obj("CodigoCargo"))= trim(request("Cargo")) then
											'Selecionando=Selecionando&"<option selected=selected value="&Obj("CodigoCargo")&">"
											'Selecionando=Selecionando&Obj("descricao")&"</option>"											
										'else
											
												Selecionando=Selecionando&"<option value="&Obj("CodigoCargo")&">"
												Selecionando=Selecionando&Obj("descricao")&"</option>"

										'end if										
                                       
                                        Obj.movenext
                                    wend
                                end select
                                 Response.Write(Selecionando)
                                %>
                               
                            </select>    
                       
                       <script>
						/* $(document).ready(function(){					   
						  $('#Tipoacao').change(function(){
							   var tacao= $('#Tipoacao').val();
							   var an = $('#Ano').val();						   
							   var req= $.get("composicao.asp",{ tipoacao:tacao, Ano:an },function(result){
								$("#sede").html(result); 
								})						
							
							});
						});
					   */
					   
					   </script>
                       
                       
                       </div> <br>
                            <div  id="ComposicaoP" style="padding: 5px 0px 10px 5px;"><strong>Por conjuntos:</strong><br>
                            
                            <select name="Composicao" id="Composicao"> 
                            	<option value=""  selected >Selecione - Conjunto</option>                               
                                <%	
								'query="select Codigo,nome from  Conjunto where Codigo in("&_
'								" select distinct (Conjunto.CodigoConjuntoPai) from  Frequencia"&_
'								" inner join Conjunto on Frequencia.Codigo=Conjunto.CodigoConjuntoPai"&_
'								" where CodigoUnidade ="&session("usr_fundacaol_unidade_docente")&" AND Ano ="&request("ano")&" AND Tabela='"&tipoacao&"')"
'								
'								
'								if request("Composicao")="" then
'									Response.Write("<option value='' selected >Selecione</option>")
'								end if
'								set obj=Conn.execute(query)
'								select case obj.eof
'									case obj.eof<>obj.bof
'										while not obj.eof
'											option_C=option_C&"<option value='"&obj("Codigo")
'											
'											if request("Composicao")=obj("Codigo") then
'												option_C=option_C &"' selected >"
'											else
'												option_C=option_C &"' >"
'											end if
'											
'											option_C=option_C&obj("nome")&"</option>"										
'											%>	
'											
'										<!--	<option value="<%'=obj("Codigo")%>" <%'if request("Composicao")=obj("Codigo") then%>selected<%'end if%>>
'												<%'=obj("nome")%>
'                                            </option>-->
'										<%			'wander=wander&obj("Codigo")&"===="&request("Composicao")&"<br>"
'											obj.movenext
'											
'										wend
'										Response.write(option_C)
'								end select
																
								%>
                            </select>    
                       </div> <br>
                       <%
					   
					   'Response.Write(wander)
					   %>                      
                     <!--  <div  id="ComposicaoF" style="padding: 5px 0px 10px 5px;<%'if request("ComposicaoFilhos")="" then%>display:none;<%'end if%>"><strong>Por <%'=Tabela%>:</strong><br>                            
                            <select name="ComposicaoFilhos" id="ComposicaoFilhos"> 
                               <%	
'								if request("ComposicaoFilhos")<>"" then
'									SqlConjunto="select Codigo,nome from  Conjunto where Codigo in("&request("ComposicaoFilhos")&")"
'									set Obj=Conn.execute(SqlConjunto)
'									select case Obj.eof
'									case Obj.bof<>Obj.eof
'										response.Write("<option selected=selected value='"&Obj("codigo")&"'>"&Obj("nome")&"</option>")
'									end select 
'									response.Write("<option value=''>Selecione</option>")
'								end if
								%>                      	 
                       		</select>
                       </div>-->
                       
                       
                       
                       
                        <div class="botao_novo">                          
                            <a href="javascript:relatoriobusca.submit();">Gerar</a>
                        </div>                            
                    </form>
                    </div>
                    </div>
   					<div  >
            <%if request("Tipoacao")<>"" then%>        
                        <table width="100%"  cellpadding="0" cellspacing="2" id="ImprirAqui">
                        	<tr>
                            	<td colspan="10"  style="text-align:center; color:#FFF; background-color:#FFF;">
                                	Relat&oacute;rio de Frequ&ecirc;ncia da  <%=Tabela%> - <%=Ano%><b class="til"> <%=Request("nome_unidade")%>
							 </b>
                                </td>
                            </tr>
                            <tr >
                                <td class="top_tab" align="left">Nome Filiado&nbsp;</td>
                                <td class="top_tab"  align="left">Frequ&ecirc;ncia&nbsp;</td>
                                <td class="top_tab" colspan="2" align="left">Presen&ccedil;as&nbsp;</td>                               
                                <td class="top_tab" colspan="2" align="left">Aus&ecirc;ncias</td>
                                <td class="top_tab" colspan="2" align="left" >Justificativas&nbsp;</td>
                            </tr>
                        <% Rs2.Open SQL1 %>
						<%x=0%>
                        <% do while not Rs2.EOF and not Rs2.BOF %>
                                                
                            <tr>
                            	<%if  trim(Rs2("nome"))="" or isnull(Rs2("nome")) then%>
                                	<td class="cont_tab2">Não foi Cadastrado</td>
                                <%else%>
                                	<td class="cont_tab2"><%= Rs2("nome") %></td>
                                <%end if %>
                                
                                <td class="cont_tab2">                                	                              	
									<%= Rs2("qtd") %>                                                  
                                </td>

                                
                                <td class="cont_tab2">
                                	 <%if  Rs2("Compareceu")=0 then%>                               	
										-
                                     <%else%>                                 	
										<%= Rs2("Compareceu") %> 
                                    <%end if%>                                      
                                </td>
                                
                                <td class="cont_tab2">  
                                	 <%if  Rs2("Compareceu")=0 then%>                               	
										-
                                     <%else%>                                 	
										<%= formatnumber(100/Rs2("qtd")* Rs2("Compareceu"),0)%>%  
                                    <%end if%> 								                                     
                                </td>

                                 <!--<td class="cont_tab2">   
                                 	 <%if  Rs2("Compareceu")=0 then%>                               	
										-
                                     <%else%>                              	
										<%= Rs2("Compareceu") %>
                                    <%end if%>                                       
                                </td>
                                
                                <td class="cont_tab2">
                                	 <%if  Rs2("Compareceu")=0 then%>                               	
										-
                                     <%else%> 
                                    	<%= formatnumber(100/Rs2("qtd")* Rs2("Compareceu"),0)%>% 
                                    <%end if%>                                    
                                </td>-->
                                
                                
                                <td class="cont_tab2"> 
                                	 <%if  Rs2("faltou")=0 then%>                               	
										-
                                     <%else%>                                	
										<%= Rs2("faltou") %>
                                    <%end if%>                                       
                                </td>
                                <td class="cont_tab2">
                                	<%if  Rs2("faltou")=0 then%>                               	
										-
                                     <%else%>  
                                    	<%= formatnumber(100/Rs2("qtd")* Rs2("faltou"),0)%>%   
                                    <%end if%>                                     
                                </td>
                                
                                <td class="cont_tab2"> 
                                	<%if  Rs2("Justificado")=0 then%>                               	
										-
                                     <%else%>
                                     	<%= Rs2("Justificado") %>
                                    <%end if%>                                      
                                </td>
                                <td class="cont_tab2">
                                     <%if  Rs2("Justificado")=0 then%>                               	
										-
                                     <%else%>  
                                    	<%= formatnumber(100/Rs2("qtd")* Rs2("Justificado"),0)%>%
                                    <%end if%>                                        
                                </td>
                                
                            </tr>

                        <% Rs2.MoveNext %>
                        <% x=x+1 %>
                        <% loop %>
                        <% Rs2.Close %>
                       <%if x=0 then  %>
                       	<tr>
                        	<td colspan="7" style="text-align:center">
                            	Nenhum Registro foi encontrado!
                            </td>
                        </tr>
                       <%end if%>
                        </table>
               <% end if %> 
                        </div>
                    </div>
                </div>
            </div>
        </div>
    </div>
</body>

<script type="text/javascript">
    var DataInicio = new DateField("DataInicio");
    var DataFim = new DateField("DataFim");
    $.datepicker.setDefaults("pt-BR");

    $('#DataInicio').datepicker({
        numberOfMonths: 3,
        showButtonPanel: true
    });

    $('#DataFim').datepicker({
        numberOfMonths: 3,
        showButtonPanel: true
    });
	 $(document).ready(function(){		
		$('#Tipoacao').change(function(){
			if ($('#Tipoacao').val()==''){
				
				$('#Composicao').val("");
			
			}
			else{
			
				var var1= $('#Tipoacao').val();
				var an= $('#Ano').val();
				
				$.get('PreencheConjunto.asp',{ tipoacao: var1, ano: an },
						function(result){
						
						$("#Composicao").html(result);
						
						
						
				});
							
				
				
				
				
			}
			
		});	
	});				

	
</script>

</html>
